home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / mydoom_virus.nasl < prev    next >
Text File  |  2005-01-14  |  2KB  |  71 lines
  1. #
  2. # Copyright (C) 2004 Tenable Network Security
  3. #
  4. #
  5. # rev 1.7: fixes a bug introduced in rev 1.6 spotted by Phil Bordelon 
  6. # rev 1.6: MyDoom.B detection
  7. #
  8.  
  9. if(description)
  10. {
  11.  script_id(12029);
  12.  script_version ("$Revision: 1.10 $");
  13.  name["english"] = "MyDoom Virus Backdoor";
  14.  
  15.  script_name(english:name["english"]);
  16.  
  17.  desc["english"] = "
  18. MyDoom backdoor is listening on this port. 
  19. A cracker may connect to it to retrieve secret 
  20. information, e.g. passwords or credit card numbers...
  21.  
  22. See also :  
  23. http://securityresponse.symantec.com/avcenter/venc/data/w32.novarg.a@mm.html
  24. http://securityresponse.symantec.com/avcenter/venc/data/w32.mydoom.f@mm.html
  25.  
  26. For a detailed description (to include partial decompilation):
  27. http://www.math.org.il/newworm-digest1.txt
  28.  
  29. Solution: Use an Anti-Virus package to remove it.
  30. Risk factor : Critical";
  31.  
  32.  
  33.  script_description(english:desc["english"]);
  34.  
  35.  summary["english"] = "Detect MyDoom worm";
  36.  script_summary(english:summary["english"]);
  37.  
  38.  script_category(ACT_GATHER_INFO);
  39.  
  40.  script_copyright(english:"This script is Copyright (C) 2004 Tenable Network Security");
  41.  family["english"] = "Backdoors";
  42.  script_family(english:family["english"]);
  43.  exit(0);
  44. }
  45.  
  46.  
  47. ports = make_list();
  48. for ( port = 3127 ; port < 3198 ; port ++ ) 
  49. {
  50.     ports = make_list(ports, port);
  51. }
  52.  
  53.  
  54. ports = make_list(ports, 1080,80,3128,8080,10080);
  55.  
  56. foreach port (ports)
  57. {
  58.  if ( get_port_state(port) ) 
  59.  {
  60.     req = string("a");
  61.     soc = open_sock_tcp(port);
  62.     if ( soc ) 
  63.     {
  64.     send(socket:soc, data:req);
  65.     r = recv(socket:soc, length:10, timeout:3);
  66.     if ( r && (strlen(r) == 8) && (ord(r[0]) == 4) ) security_hole(port); 
  67.     }
  68.  }
  69. }
  70.  
  71.